Function: (setf jsonrpc--events-buffer)

(setf\ jsonrpc--events-buffer) is a byte-compiled function defined in jsonrpc.el.gz.

Signature

(\(setf\ jsonrpc--events-buffer\) ARG0 ARG &rest ARGS)

Implementations

(value (this jsonrpc-connection)) in `jsonrpc.el'.

Undocumented

Source Code

;; Defined in /usr/src/emacs/lisp/jsonrpc.el.gz
;; Could not find source code, showing raw function object.
#[642 "\304\203�\305!\202\f�\306\303\307\"\2067�\310\300\311\301\302\312\313\203'�\305\f!\202(�\306!\314\315!\"%\316#\210\211\262
\266\202$\207"
      [#s(cl--generic \(setf\ jsonrpc--events-buffer\)
		      ((1 #s(cl--generic-generalizer eieio--generic-generalizer 50 cl--generic-struct-tag
						     #[385 "
\301N\302
!>\205�\303\304\305!\"\207"
							   [cl-struct-eieio--class-tags cl--class type-of mapcar eieio--class-name eieio--class-precedence-list]
							   7 "\n\n(fn TAG &rest _)"])
			  #s(cl--generic-generalizer cl--generic-t-generalizer 0
						     #[385 "\300\207"
							   [nil]
							   3 "\n\n(fn NAME &rest _)"]
						     #[385 "\300\207"
							   [(t)]
							   3 "\n\n(fn TAG &rest _)"]))
		       (0 #s(cl--generic-generalizer cl--generic-t-generalizer 0
						     #[385 "\300\207"
							   [nil]
							   3 "\n\n(fn NAME &rest _)"]
						     #[385 "\300\207"
							   [(t)]
							   3 "\n\n(fn TAG &rest _)"])))
		      (#s(cl--generic-method
			  (t jsonrpc-connection)
			  nil nil
			  #[514 "\300
\301#\207"
				[eieio-oset -events-buffer]
				6 "\n\n(fn VALUE THIS)"]))
		      nil)
	 ((0 #s(cl--generic-generalizer cl--generic-t-generalizer 0
					#[385 "\300\207"
					      [nil]
					      3 "\n\n(fn NAME &rest _)"]
					#[385 "\300\207"
					      [(t)]
					      3 "\n\n(fn TAG &rest _)"])))
	 (#s(cl--generic-method
	     (t jsonrpc-connection)
	     nil nil
	     #[514 "\300
\301#\207"
		   [eieio-oset -events-buffer]
		   6 "\n\n(fn VALUE THIS)"]))
	 #s(hash-table size 65 test eql rehash-size 1.5 rehash-threshold 0.8125 data
		       ())
	 apply type-of null gethash cl--generic-cache-miss 1 append
	 #[385 "
\301N\302
!>\205�\303\304\305!\"\207"
	       [cl-struct-eieio--class-tags cl--class type-of mapcar eieio--class-name eieio--class-precedence-list]
	       7 "\n\n(fn TAG &rest _)"]
	 #[385 "\300\207"
	       [(t)]
	       3 "\n\n(fn TAG &rest _)"]
	 nil puthash]
      15 "\n\n(fn ARG0 ARG &rest ARGS)"]